home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Ss-Sz / StoryWriter1.2.cpt / Story Writer 1.2 / background_4472.txt < prev    next >
Text File  |  1988-02-16  |  3KB  |  151 lines
  1. -- background: 4472 from stack: in.2
  2. -- bmap block id: 2530
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 01
  10. -- high flags: 0000
  11. -- rect: left=51 top=22 right=46 bottom=455
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 1024
  18. -- line height: 16
  19. -- part name: title
  20.  
  21.  
  22. -- part 2 (field)
  23. -- low flags: 01
  24. -- high flags: 0007
  25. -- rect: left=52 top=82 right=283 bottom=464
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 0
  29. -- font id: 3
  30. -- text size: 9
  31. -- style flags: 0
  32. -- line height: 12
  33. -- part name: story
  34.  
  35.  
  36. -- part 3 (field)
  37. -- low flags: 01
  38. -- high flags: 0000
  39. -- rect: left=120 top=302 right=327 bottom=245
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 1
  43. -- font id: 0
  44. -- text size: 12
  45. -- style flags: 0
  46. -- line height: 16
  47. -- part name: 
  48.  
  49.  
  50. -- part 4 (field)
  51. -- low flags: 01
  52. -- high flags: 0000
  53. -- rect: left=96 top=52 right=71 bottom=414
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 1
  57. -- font id: 3
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: date
  62.  
  63.  
  64. -- part 5 (button)
  65. -- low flags: 00
  66. -- high flags: A003
  67. -- rect: left=276 top=299 right=323 bottom=357
  68. -- title width / last selected line: 0
  69. -- icon id / first selected line: 0 / 0
  70. -- text alignment: 1
  71. -- font id: 0
  72. -- text size: 12
  73. -- style flags: 0
  74. -- line height: 16
  75. -- part name: New Story
  76. ----- HyperTalk script -----
  77. on mouseUp
  78.   get empty
  79.   put it into card field "title" of card "title"
  80.   put it into card field "character" of card "title"
  81.   put it into card field "theme" of card "title"
  82.   visual effect scroll down
  83.   go to card "title"
  84. end mouseUp
  85.  
  86.  
  87. -- part 6 (button)
  88. -- low flags: 00
  89. -- high flags: A003
  90. -- rect: left=363 top=299 right=323 bottom=401
  91. -- title width / last selected line: 0
  92. -- icon id / first selected line: 0 / 0
  93. -- text alignment: 1
  94. -- font id: 0
  95. -- text size: 12
  96. -- style flags: 0
  97. -- line height: 16
  98. -- part name: Quit
  99. ----- HyperTalk script -----
  100. on mouseUp
  101.   answer "Quit HyperCard or go to Home Card?" with "Cancel" or "Quit" or "Go Home"
  102.   if it is "Go Home" then
  103.     go home
  104.     exit mouseUp
  105.   end if
  106.   if it is "cancel" then exit mouseUp
  107.   else visual effect zoom in
  108.   domenu "Quit Hypercard"
  109. end mouseUp
  110.  
  111.  
  112.  
  113.  
  114. -- part 9 (button)
  115. -- low flags: 00
  116. -- high flags: 0000
  117. -- rect: left=110 top=293 right=330 bottom=145
  118. -- title width / last selected line: 0
  119. -- icon id / first selected line: 0 / 0
  120. -- text alignment: 1
  121. -- font id: 0
  122. -- text size: 12
  123. -- style flags: 0
  124. -- line height: 16
  125. -- part name: 
  126. ----- HyperTalk script -----
  127. on mouseUp
  128.   visual effect wipe right
  129.   go previous card
  130. end mouseUp
  131.  
  132.  
  133.  
  134. -- part 12 (button)
  135. -- low flags: 00
  136. -- high flags: 0000
  137. -- rect: left=221 top=296 right=329 bottom=257
  138. -- title width / last selected line: 0
  139. -- icon id / first selected line: 0 / 0
  140. -- text alignment: 1
  141. -- font id: 0
  142. -- text size: 12
  143. -- style flags: 0
  144. -- line height: 16
  145. -- part name: 
  146. ----- HyperTalk script -----
  147. on mouseUp
  148.   go next
  149. end mouseUp
  150.  
  151.